home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Skunkware 5
/
Skunkware 5.iso
/
src
/
X11
/
povray-2.1
/
povscn
/
scenes
/
level3
/
snail
/
mmshape.inc
< prev
next >
Wrap
Text File
|
1995-05-03
|
4KB
|
218 lines
// Persistence Of Vision raytracer version 2.0 sample file.
// non-Standard shapes #include file
//
#declare Ellipsoid = quadric {
<1.0, 1.0, 1.0>,
<0.0, 0.0, 0.0>,
<0.0, 0.0, 0.0>,
-1.0
}
#declare light = light_source { <0, 0, 0> color White }
#declare USphere = intersection {
sphere { <0, 0, 0>, 1 }
plane { y, 0 inverse }
}
#declare DSphere = intersection {
sphere { <0, 0, 0>, 1 }
plane { -y, 0 inverse }
}
#declare Cylinder_X = quadric {
<0.0, 1.0, 1.0>,
<0.0, 0.0, 0.0>,
<0.0, 0.0, 0.0>,
-1.0
}
#declare Cylinder_Y = quadric {
<1.0, 0.0, 1.0>,
<0.0, 0.0, 0.0>,
<0.0, 0.0, 0.0>,
-1.0
}
#declare Cylinder_Z = quadric {
<1.0, 1.0, 0.0>,
<0.0, 0.0, 0.0>,
<0.0, 0.0, 0.0>,
-1.0
}
#declare QCone_X = quadric {
<-1.0, 1.0, 1.0>,
<0.0, 0.0, 0.0>,
<0.0, 0.0, 0.0>,
0.0
}
#declare QCone_Y = quadric {
<1.0, -1.0, 1.0>,
<0.0, 0.0, 0.0>,
<0.0, 0.0, 0.0>,
0.0
}
#declare QCone_Z = quadric {
<1.0, 1.0, -1.0>,
<0.0, 0.0, 0.0>,
<0.0, 0.0, 0.0>,
0.0
}
#declare DCone = /*---------CONE POINT DOWN /POINT at 000--------*/
intersection {
object { QCone_Y scale <1, 1, 1> }
plane { -y, 0 }
plane { y, 1 }
}
#declare UCone = /*---------CONE POINT UP /POINT at 000--------*/
intersection {
object { QCone_Y scale <1, 1, 1> }
plane { y, 0 }
plane { y, -1 inverse }
}
#declare BiCone = /*----2 CONES POINTS TOGETHER /POINT at 000---*/
intersection {
object { QCone_Y scale <1, 1, 1> }
plane { y, 1 }
plane { y, -1 inverse }
}
#declare Plane_YZ = quadric {
<0.0, 0.0, 0.0>,
<0.0, 0.0, 0.0>,
<1.0, 0.0, 0.0>,
0.0
}
#declare Plane_XZ = quadric {
<0.0, 0.0, 0.0>,
<0.0, 0.0, 0.0>,
<0.0, 1.0, 0.0>,
0.0
}
#declare Plane_XY = quadric {
<0.0, 0.0, 0.0>,
<0.0, 0.0, 0.0>,
<0.0, 0.0, 1.0>,
0.0
}
/* y^2 + z^2 - x = 0 */
#declare Paraboloid_X = quadric {
<0.0, 1.0, 1.0>,
<0.0, 0.0, 0.0>,
<-1.0, 0.0, 0.0>,
0.0
}
/* x^2 + z^2 - y = 0 */
#declare Paraboloid_Y = quadric {
<1.0, 0.0, 1.0>,
<0.0, 0.0, 0.0>,
<0.0, -1.0, 0.0>,
0.0
}
/* x^2 + y^2 - z = 0 */
#declare Paraboloid_Z = quadric {
<1.0, 1.0, 0.0>,
<0.0, 0.0, 0.0>,
<0.0, 0.0, -1.0>,
0.0
}
/* y - x^2 + z^2 = 0 */
#declare Hyperboloid = quadric {
< -1.0, 0.0, 1.0>,
< 0.0, 0.0, 0.0>,
< 0.0, 1.0, 0.0>,
0.0
}
#declare Hyperboloid_Y = quadric { /* Vertical hyperboloid */
<1.0, -1.0, 1.0>, /* */
<0.0, 0.0, 0.0>, /* \ / */
<0.0, 0.0, 0.0>, /* Like this: ) ( */
-1.0 /* / \ */
}
#declare Cube = intersection {
plane { z, 1.0 }
plane { -z, 1.0 }
plane { y, 1.0 }
plane { -y, 1.0 }
plane { x, 1.0 }
plane { -x, 1.0 }
}
#declare Tetrahedron = intersection {
plane { -y, 1.0 }
plane { z, 1.0 rotate -30.0*x }
plane { x, 1.0 rotate <0.0, 30.0, 30.0> }
plane { -x, 1.0 rotate <0.0, -30.0, -30.0> }
}
#declare Disk_X = intersection { /* Capped cylinder, Length in x axis */
object { Cylinder_X }
plane { x, 0.0 inverse }
plane { x, 1.0 }
}
#declare Disk_Y = intersection { /* Capped cylinder, Length in y axis */
object { Cylinder_Y }
plane { y, 0.0 inverse }
plane { y, 1.0 }
}
#declare Disk_Z = intersection { /* Capped cylinder, Length in z axis */
object { Cylinder_Z }
plane { z, 0.0 inverse }
plane { z, 1.0 }
}
#declare Hexagon = intersection { /* Hexagonal Solid, axis along x */
plane { z, 1.0 } /* Rotate 90 in z axis to stand up */
plane { z, 1.0 rotate 60.0*x }
plane { z, 1.0 rotate 120.0*x }
plane { z, 1.0 rotate 180.0*x }
plane { z, 1.0 rotate 240.0*x }
plane { z, 1.0 rotate 300.0*x }
plane { x, 1.0 }
plane { x, -1.0 inverse }
}
#declare Rhomboid = /* Three Dimensional 4-Sided Diamond */
intersection {
plane { -x, 1.0 rotate -30.0*z }
plane { x, 1.0 rotate -30.0*z }
plane { z, 1.0 }
plane { -z, 1.0 }
plane { y, 1.0 }
plane { -y, 1.0 }
}